﻿<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<meta name="GENERATOR" content="Microsoft FrontPage 12.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<link rel="STYLESHEET" type="text/css" id="SkinStyleSheet">
<title>WebNoteEditor</title>

<Script Language="vbscript">
dim vPercent,fileURL
sub window_onload()
	SkinStyleSheet.href="../"&window.top.EditorWindow.WebNoteSkinResourcePath&"editor.css"
end sub

Function SetPercent(sPercent)
	DivBar.Style.Width=FormatPercent(sPercent)
	vPercent=sPercent
End Function

Function GetPercent()
	GetPercent=vPercent
End Function

Function AutoProgress(sStep,sTimeOut,sEndPercent)
	if GetPercent>=sEndPercent then
		SetPercent(sEndPercent)
	else
		SetPercent(GetPercent+sStep)
		SetTimeOut "AutoProgress "&sStep&","&sTimeOut&","&sEndPercent,sTimeOut
	end if
	SetStatusPercent()
End Function

Function AutoProgressing()
	Call AutoProgress(.05,100,.99)
End Function

Function SetStatusPercent()
	StatusPercent.innerText=DivBar.Style.Width
End Function

Function SetStatusText(sStr)
	StatusText.innerText=sStr
End Function

Function GetStatusText()
	GetStatusText=StatusText.innerText
End Function
</Script>
</head>

<body topmargin="0" leftmargin="0" class="dialog">

<table border="0" width="100%" style="border-style: inset; border-width: 1" cellspacing="0" cellpadding="0">
  <tr>
    <td width="100%" bgcolor="#FFFFFF">
      <div id="DivBar" style="filter: alpha(opacity=80); background-color: #08246B; height: 16px;width:0"></div>
    </td>
  </tr>
</table>

<table border="0" width="100%" cellspacing="0" cellpadding="0">
  <tr>
    <td width="30" style="border-style: inset; border-width: 1;font-size:9pt;padding-right:10px" id="StatusPercent" align="right"></td>
    <td id="StatusText" style="border-style: inset; border-width: 1;font-size:9pt;padding-left:10px"></td>
  </tr>
</table>
</body>
</html>
